home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
fish
/
676-700
/
682
/
reqchange
/
extra
/
getenv.rexx
next >
Wrap
OS/2 REXX Batch file
|
1995-03-18
|
254b
|
13 lines
/* GetEnv.Rexx. Returns the contents of the named global environment
variable. Ignores any argument except the first one. */
name = arg( 1 )
var = ""
if open( file, 'ENV:' || name, read ) then do
var = readln( file )
call close file
end
return var